home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 20r.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-07  |  1.9 KB  |  76 lines
  1. on startMovie
  2.   global gCursorReady, gKnobState, gMagCursor, gsearchOn, qtChan, gKnobSprite, gSendMovie, gCurrentLocation
  3.   puppetSprite(44, 1)
  4.   gCursorReady = 1
  5.   gMagCursor = "magCursor"
  6.   gCurrentLocation = 20
  7.   puppetSprite(48, 1)
  8.   puppetSound(0)
  9.   gSendMovie = "20r"
  10.   qtChan = 35
  11.   sprite(qtChan).volume = 256
  12.   cast("fesmem").directToStage = 1
  13.   preLoad(qtChan - 1)
  14.   initGlobals()
  15.   gKnobSprite = 17
  16.   setUpKnob()
  17.   set the mouseDownScript to EMPTY
  18.   set the mouseUpScript to EMPTY
  19.   if gsearchOn = 1 then
  20.     sprite(6).visible = 1
  21.   else
  22.     sprite(6).visible = 0
  23.   end if
  24. end
  25.  
  26. on idle
  27.   global gCursorReady
  28.   if gCursorReady = 1 then
  29.     cursor(200)
  30.     checkCursors()
  31.     set the locH of sprite 44 to the mouseH
  32.     set the locV of sprite 44 to the mouseV
  33.     updateStage()
  34.     if sprite(36).movieRate = 0 then
  35.       sprite(36).movieRate = 1
  36.     end if
  37.   end if
  38. end
  39.  
  40. on checkCursors
  41.   global gMagCursor
  42.   set the castNum of sprite 44 to the number of member "curs1"
  43.   if rollOver(5) then
  44.     set the castNum of sprite 44 to the number of member "hotCursor"
  45.   end if
  46.   if rollOver(22) then
  47.     set the castNum of sprite 44 to the number of member "hotCursor"
  48.   end if
  49.   repeat with i = 8 to 12
  50.     if rollOver(i) then
  51.       set the castNum of sprite 44 to the number of member "hotCursor"
  52.     end if
  53.   end repeat
  54.   repeat with i = 14 to 21
  55.     if rollOver(i) then
  56.       set the castNum of sprite 44 to the number of member "hotCursor"
  57.     end if
  58.   end repeat
  59.   repeat with i = 24 to 28
  60.     if rollOver(i) then
  61.       set the castNum of sprite 44 to the number of member "hotCursor"
  62.     end if
  63.   end repeat
  64.   if rollOver(37) then
  65.     set the castNum of sprite 44 to the number of member "hotCursor"
  66.   end if
  67.   repeat with i = 40 to 42
  68.     if rollOver(i) then
  69.       set the castNum of sprite 44 to the number of member "hotCursor"
  70.     end if
  71.   end repeat
  72.   if rollOver(43) then
  73.     set the castNum of sprite 44 to the number of member "hotCursor"
  74.   end if
  75. end
  76.